File:of Disk: Disks/Build-2007/MyProgs-22-04-07
(Source file text)
14 -764 1977 03240 7240 P1T5A, CLA CMA /7777 TO AC 1978 03241 6026 PLS /CLEAR, LOAD AND PUNCH 1979 03242 7200 CLA 1980 03243 6026 PLS /CLEAR BUFFER CONTENTS PRIOR TO PUNCHING /HIGH SPEED READER/PUNCH TESTS PAL8-V10A 23-OCT-81 PAGE 1-36 1981 03244 6021 PSF 1982 03245 5244 JMP .-1 1983 03246 2122 ISZ CTRA /DONE? 1984 03247 5240 JMP P1T5A /NO, REPEAT 1985 03250 5425 JMP I CHAIN /YES, CHAIN 1986 03251 0006 P1T6, 6 1987 03252 3265 P1T7 1988 /CHECKS ABILITY OF IOT024 TO SET BUFFER TO 125 AND PUNCH IT 1989 03253 4477 SETA /-500 TO CTRA 1990 03254 7014 -764 1991 03255 7200 P1T6A, CLA 1992 03256 1152 TAD [125 1993 03257 6026 PLS /CLEAR, LOAD AND PUNCH 1994 03260 6021 PSF /WAIT FOR FLAG 1995 03261 5260 JMP .-1 1996 03262 2122 ISZ CTRA /DONE? 1997 03263 5255 JMP P1T6A /NO, REPEAT 1998 03264 5425 JMP I CHAIN /YES, CHAIN 1999 03265 0007 P1T7, 7 2000 03266 3400 P1T10 2001 /CHECKS ABILITY OF IOT024 TO SET BUFFER TO 252 AND PUNCH IT 2002 03267 4477 SETA /-500 TO CTRA 2003 03270 7014 -764 2004 03271 7200 P1T7A, CLA 2005 03272 1151 TAD [252 2006 03273 6026 PLS /CLEAR, LOAD AND PUNCH 2007 03274 6021 PSF /WAIT FOR FLAG 2008 03275 5274 JMP .-1 2009 03276 2122 ISZ CTRA /DONE? 2010 03277 5271 JMP P1T7A /NO, REPEAT 2011 03300 5425 JMP I CHAIN /YES, CHAIN 2012 03301 7770 PCNT2, 7770 2013 03302 7770 P7770, 7770 2014 3400 PAGE 2015 03400 0010 P1T10, 10 2016 03401 7777 7777 /END OF TESTS 2017 /CHECKS ABILITY OF PUNCH FLAG TO CAUSE AN INTERRUPT 2018 03402 4475 SETLOC /SET INTERRUPT RETURN 2019 03403 0002 2 /TO P1E10A 2020 03404 3415 P1E10A 2021 03405 6032 P1T10A, KCC /CLEAR TTY READER 2022 03406 6042 TCF /CLEAR TTY PUNCH 2023 03407 6012 RRB /CLEAR READER 2024 03410 6022 PCF /CLEAR PUNCH 2025 03411 6001 ION /ENABLE INTERRUPT 2026 03412 7000 NOP 2027 03413 6002 IOF /TURN OFF INTERRUPT 2028 03414 5222 JMP P1T10B 2029 03415 4451 P1E10A, JMS I UERROR 2030 03416 0140 A 2031 03417 0000 NONE 2032 03420 5205 JMP P1T10A 2033 03421 5205 JMP P1T10A 2034 03422 4477 P1T10B, SETA /-4095 TO CTRA 2035 03423 0001 -7777 /HIGH SPEED READER/PUNCH TESTS PAL8-V10A 23-OCT-81 PAGE 1-37 2036 03424 4475 SETLOC /SET INTERRUPT RETURN 2037 03425 0002 2 /TO P1T10E 2038 03426 3456 P1T10E 2039 03427 7200 CLA 2040 03430 6010 RPE /SET INTERRUPT ENABLE 2041 03431 6026 PLS /CLEAR, LOAD AND PUNCH 2042 03432 6021 PSF /WAIT FOR FLAG 2043 03433 5232 JMP .-1 2044 03434 6001 P1T10C, ION 2045 03435 7000 NOP 2046 03436 6002 IOF 2047 03437 4451 P1E10B, JMS I UERROR 2048 03440 0240 B 2049 03441 0000 NONE 2050 03442 5256 JMP P1T10E 2051 03443 4475 P1T10S, SETLOC /SET INTERRUPT RETURN 2052 03444 0002 2 /TO P1T10D 2053 03445 3455 P1T10D 2054 03446 7200 CLA 2055 03447 6026 PLS /CLEAR, LOAD AND PUNCH 2056 03450 6021 PSF /WAIT FOR FLAG 2057 03451 5250 JMP .-1 2058 03452 6001 ION /ENABLE INTERRUPT 2059 03453 7000 NOP 2060 03454 5252 JMP .-2 2061 03455 5252 P1T10D, JMP .-3 2062 03456 2122 P1T10E, ISZ CTRA /DONE? 2063 03457 5234 JMP P1T10C /NO, REPEAT 2064 03460 6020 PCE /CLEAR INTERRUPT ENABLE 2065 03461 5425 JMP I CHAIN /YES, CHAIN 2066 /PROGRAM 2, READER TEST, SPECIAL BINARY COUNT PATTERN 2067 03462 4475 PRG2, SETLOC /SET SR 2068 03463 0105 SRMSK /MASK TO 2069 03464 0460 0460 /0460 2070 03465 4464 P2A, JMS I SYNC /SYNC READER 2071 03466 4477 SETA 2072 03467 7773 -5 2073 03470 4463 P2B, JMS I CRCNT /GET RANDOM CHAR 2074 03471 3123 DCA CTRB /COUNT IN CTRB 2075 03472 4467 P2C, JMS I GETPT /GET BINARY CHAR 2076 03473 3462 DCA I UTSB /STORE IT 2077 03474 4455 JMS I UTREAD /GO READ CHAR 2078 03475 4461 JMS I UTCHK /GO CHECK IT 2079 03476 5303 JMP P2E /ERROR 2080 03477 2123 P2D, ISZ CTRB /GROUP DONE? 2081 03500 5272 JMP P2C /NO 2082 03501 4563 JMS I [STALL /YES, STALL 2083 03502 5270 JMP P2B /REPEAT 2084 03503 2122 P2E, ISZ CTRA /5 ERRORS? 2085 03504 5277 JMP P2D /NO, CONTINUE 2086 03505 5265 JMP P2A /RESYNC 2087 / 2088 /PROGRAM 3, PUNCH TEST, SPECIAL BINARY COUNT PATTERN 2089 03506 4460 PRG3, JMS I UMARK /MARK TAPE 2090 03507 4457 JMS I UPLDR /PUNCH LEADER /HIGH SPEED READER/PUNCH TESTS PAL8-V10A 23-OCT-81 PAGE 1-38 2091 03510 4466 JMS I INPATT /INITIALIZE BINARY PATTERN 2092 03511 1150 TAD [60 2093 03512 3105 DCA SRMSK 2094 03513 4467 P3A, JMS I GETPT /GET BINARY CHAR 2095 03514 4456 JMS I UTPCH /PUNCH IT 2096 03515 4563 JMS I [STALL 2097 03516 5313 JMP P3A 2098 /PROGRAM 4, PUNCH VERIFY, SPECIAL BINARY COUNT PATTERN 2099 03517 4466 PRG4, JMS I INPATT /INITIALIZE BINARY PATTERN 2100 03520 4475 SETLOC /400 TO 2101 03521 0105 SRMSK /TO SR MASK 2102 03522 0400 0400 2103 03523 4467 JMS I GETPT /GET BINARY CHAR 2104 03524 3462 DCA I UTSB /STORE IT 2105 03525 4455 JMS I UTREAD /READ CHARACTER 2106 03526 7440 SZA /ZERO? 2107 03527 5334 JMP P4B /NO 2108 03530 5325 JMP .-3 /YES, REPEAT READ 2109 03531 4467 P4A, JMS I GETPT /GET BINARY CHAR 2110 03532 3462 DCA I UTSB /STORE IT 2111 03533 4455 JMS I UTREAD /READ CHAR 2112 03534 4461 P4B, JMS I UTCHK /GO CHECK IT 2113 03535 7000 NOP 2114 03536 5331 JMP P4A /REPEAT 2115 /PROGRAM 5, PUNCH TEST, RANDOM CHARACTER PATTERN 2116 03537 4460 PRG5, JMS I UMARK /MARK TAPE 2117 03540 4457 JMS I UPLDR /PUNCH LEADER 2118 03541 4474 JMS I UMOVE /INITIALIZE RANDOM 2119 03542 1247 SEED1 /CHARACTER ROUTINE 2120 03543 1251 RANP1 2121 03544 7774 -4 2122 03545 1150 TAD [60 2123 03546 3105 DCA SRMSK 2124 03547 4453 P5A, JMS I ULPRGN /GET RANDOM CHAR 2125 03550 4456 JMS I UTPCH /PUNCH IT 2126 03551 4563 JMS I [STALL 2127 03552 5347 JMP P5A /REPEAT 2128 /PROGRAM 6, PUNCH VERIFY, RANDOM CHARACTER PATTERN 2129 03553 4474 PRG6, JMS I UMOVE /INITIALIZE RANDOM 2130 03554 1247 SEED1 /CHARACTER ROUTINE 2131 03555 1251 RANP1 2132 03556 7774 -4 2133 03557 4475 SETLOC /400 TO 2134 03560 0105 SRMSK /SR MASK 2135 03561 0400 0400 2136 03562 4454 JMS I ULRRGN /GET RANDOM CHAR 2137 03563 3462 DCA I UTSB /STORE IT 2138 03564 4455 JMS I UTREAD /READ CHAR 2139 03565 7440 SZA /ZERO? 2140 03566 5373 JMP P6B /NO 2141 03567 5364 JMP .-3 2142 03570 4454 P6A, JMS I ULRRGN /GET RANDOM CHAR 2143 03571 3462 DCA I UTSB /STORE IT 2144 03572 4455 JMS I UTREAD /READ CHAR 2145 03573 4461 P6B, JMS I UTCHK /GO CHECK IT /HIGH SPEED READER/PUNCH TESTS PAL8-V10A 23-OCT-81 PAGE 1-39 2146 03574 7000 NOP /ERROR 2147 03575 5370 JMP P6A 2148 3600 PAGE 2149 /PROGRAM 7, COMBINES READER-PUNCH TEST, SPECIAL BINARY COUNT PATTERN 2150 03600 4475 PRG7, SETLOC /SET SR MASK TO 0460 2151 03601 0105 SRMSK 2152 03602 0460 0460 2153 03603 4475 SETLOC 2154 03604 0104 DLYMSK 2155 03605 0077 77 2156 03606 4466 JMS I INPATT /INITIALIZE BINARY PATTERN 2157 03607 2133 ISZ ACTIND /SET ACTIVE INDICATOR 2158 03610 4475 SETLOC /SET INTERRUPT 2159 03611 0002 2 /SERVIE ADDRESS 2160 03612 0703 INTSVC 2161 03613 4475 SETLOC /SET PUNCH SERVICE ADDRESS 2162 03614 0716 PVCTR 2163 03615 3624 PBIN 2164 03616 4475 SETLOC /SET READER SERVICE ADDRESS 2165 03617 0711 RVCTR 2166 03620 3671 WNZERO 2167 03621 4246 JMS CPCH /PUNCH CHAR 2168 03622 6001 ION /ENABLE INTERRUPT 2169 03623 5223 JMP . /IDLE 2170 03624 2132 PBIN, ISZ PCHCNT /INCREMENT PUNCH COUNT 2171 03625 1132 TAD PCHCNT /COMPARE PUNCH COUNT 2172 03626 1147 TAD [-144 /TO 100 2173 03627 7710 SPA CLA /GREATER THAN 100? 2174 03630 5233 JMP .+3 /NO, OK 2175 03631 7402 HLT /YES, ERROR HALT 2176 03632 5231 JMP .-1 2177 03633 4246 JMS CPCH /PUNCH BIN CHAR 2178 03634 1127 TAD RBUSY 2179 03635 7640 SZA CLA /READER BUSY? 2180 03636 5503 OUT /YES, EXIT 2181 03637 1132 TAD PCHCNT /GET PUNCH COUNT 2182 03640 1146 TAD [-12 /SUBTRACT SLACK COUNT 2183 03641 7710 SPA CLA /POSITIVE? 2184 03642 5503 OUT /NO, EXIT 2185 03643 6014 RFC /YES, START READER 2186 03644 2127 ISZ RBUSY /SET READER BUSY 2187 03645 5503 OUT /EXIT 2188 03646 0000 CPCH, 0 2189 03647 4470 JMS I GETPTR /GET BIN CHAR 2190 03650 6026 PLS /ENABLE PUNCH 2191 03651 7200 CLA /CLEAR AC 2192 03652 5646 JMP I CPCH /EXIT 2193 03653 0000 CREAD, 0 2194 03654 7200 CLA 2195 03655 6012 RRB /READ CHAR 2196 03656 3131 DCA TCHKW /STORE IT 2197 03657 1132 TAD PCHCNT /GET PUNCH COUNT 2198 03660 1145 TAD [-1 /MINUS 1 2199 03661 3132 DCA PCHCNT /STORE IT 2200 03662 1132 TAD PCHCNT /HIGH SPEED READER/PUNCH TESTS PAL8-V10A 23-OCT-81 PAGE 1-40 2201 03663 7640 SZA CLA /0? 2202 03664 5267 JMP .+3 /NO 2203 03665 3127 DCA RBUSY /YES, CLEAR READER BUSY 2204 03666 5653 JMP I CREAD /EXIT 2205 03667 6014 RFC /FETCH NEXT CHAR 2206 03670 5653 JMP I CREAD /EXIT 2207 03671 4253 WNZERO, JMS CREAD /READ CHAR 2208 03672 1131 TAD TCHKW 2209 03673 7650 SNA CLA /IS IT 0? 2210 03674 5503 OUT /YES 2211 03675 4475 SETLOC /SET INTERRUPT SERVICE 2212 03676 0711 RVCTR /TO RBIN 2213 03677 3703 RBIN 2214 03700 4477 SETA /-5 TO CTRA 2215 03701 7773 -5 2216 03702 7410 SKP 2217 03703 4253 RBIN, JMS CREAD /READ CHAR 2218 03704 4467 JMS I GETPT /GET BINARY CHAR 2219 03705 3462 DCA I UTSB 2220 03706 1131 TAD TCHKW /GET CHAR READ 2221 03707 4461 JMS I UTCHK /GO CHECK IT 2222 03710 7410 SKP /ERROR 2223 03711 5503 OUT /NO 2224 03712 2122 ISZ CTRA /5 ERRORS? 2225 03713 5503 OUT /NO, TO MAINLINE 2226 03714 4475 RBINA, SETLOC /YES, SET READER SERVICE 2227 03715 0711 RVCTR /TO RESYNC TAPE 2228 03716 3720 .+2 2229 03717 5503 OUT 2230 03720 4253 JMS CREAD /READ CHAR 2231 03721 1131 TAD TCHKW 2232 03722 3110 DCA CHR1 /STORE 2233 03723 4475 SETLOC /SET READER SERVICE 2234 03724 0711 RVCTR 2235 03725 3727 .+2 2236 03726 5503 OUT 2237 03727 4253 JMS CREAD /READ CHAR 2238 03730 1131 TAD TCHKW 2239 03731 3111 DCA CHR2 2240 03732 4475 SETLOC /SET READER SERVICE 2241 03733 0711 RVCTR 2242 03734 3736 .+2 2243 03735 5503 OUT 2244 03736 4253 JMS CREAD /READ CHAR 2245 03737 1131 TAD TCHKW 2246 03740 3112 DCA CHR3 2247 03741 4465 JMS I SYNCA /GO SYNC 2248 03742 5314 JMP RBINA /SYNC ERROR, TRY AGAIN 2249 03743 4477 SETA /YES, -5 TO CTRA 2250 03744 7773 -5 2251 03745 4475 SETLOC /RESTORE READER SERVICE TO 2252 03746 0711 RVCTR /TO RBIN 2253 03747 3703 RBIN 2254 03750 5503 OUT 2255 4000 PAGE /HIGH SPEED READER/PUNCH TESTS PAL8-V10A 23-OCT-81 PAGE 1-41 2256 /PROGRAM 10, READ AMPLIFIER ADJUSTMENT LOOP 2257 04000 4475 PRG10, SETLOC /SET INTERRUPT SERVICE 2258 04001 0002 2 /TO INTSVC 2259 04002 0703 INTSVC 2260 04003 4475 SETLOC /SET PUNCH SERVICE ADDRESS 2261 04004 0716 PVCTR /TO PCHCLR 2262 04005 0741 PCHCLR 2263 04006 4475 SETLOC /SET READER SERVICE ADDRESS 2264 04007 0711 RVCTR /TO AMPRDA 2265 04010 4070 AMPRDA 2266 04011 4475 SETLOC 2267 04012 1075 ERRORA 2268 04013 7000 7000 2269 04014 1144 TAD [NOP 2270 04015 3572 DCA I [STALL+3 2271 04016 3105 DCA SRMSK /0 TO SR MASK 2272 04017 4253 RAMPA, JMS AMPRD /GO READ CHAR 2273 04020 7440 SZA /ZERO? 2274 04021 7410 SKP /NO 2275 04022 4253 RAMPB, JMS AMPRD /GO READ CHAR 2276 04023 7041 CIA 2277 04024 1153 TAD [PTMSK 2278 04025 7640 SZA CLA /ALL 1'S? 2279 04026 5233 JMP RAMPC /NO, ERROR 2280 04027 4253 JMS AMPRD /YES, GO READ 2281 04030 7640 SZA CLA /ZERO? 2282 04031 5242 JMP RAMPD /NO, ERROR 2283 04032 5222 JMP RAMPB /YES, REPEAT 2284 04033 4452 RAMPC, JMS I UASCCN /CONVERT EXPECTED CHAR 2285 04034 4052 RAMPF /TO PRINTABLE ASCII 2286 04035 1604 SB 2287 04036 4452 JMS I UASCCN /CONVERT BAD CHAR TO 2288 04037 4074 RAMPWA /TO PRINTABLE ASCII 2289 04040 1611 WAS 2290 04041 5246 JMP RAMPE 2291 04042 4452 RAMPD, JMS I UASCCN /CONVERT EXPECTED CHAR 2292 04043 4075 RAMPWB /TO PRINTABLE ASCII 2293 04044 1604 SB 2294 04045 5236 JMP RAMPD-4 2295 04046 4451 RAMPE, JMS I UERROR /GO PRINT ERROR 2296 04047 4040 NOSUF 2297 04050 1601 SBWAS 2298 04051 5217 JMP RAMPA /TRY AGAIN 2299 04052 0377 RAMPF, 377 2300 04053 0000 AMPRD, 0 2301 04054 4501 SETDLM /-75 TO DELAYM 2302 04055 7665 -113 2303 04056 6014 RFC /FETCH CHAR 2304 04057 6001 ION /ENABLE INTERRUPT 2305 04060 4502 DELAY /DELAY 75 MS 2306 04061 6002 IOF 2307 04062 6011 RSF /FLAG 1? 2308 04063 7410 SKP /NO, FLAG DROPPED 2309 04064 5270 JMP AMPRDA /YES 2310 04065 4447 JMS I XTYPST /RING BELL 3 TIMES /HIGH SPEED READER/PUNCH TESTS PAL8-V10A 23-OCT-81 PAGE 1-42 2311 04066 4076 BELL3 2312 04067 5217 JMP RAMPA /TRY AGAIN 2313 04070 6012 AMPRDA, RRB 2314 04071 3274 DCA RAMPWA 2315 04072 1274 TAD RAMPWA 2316 04073 5653 JMP I AMPRD 2317 04074 0000 RAMPWA, 0 2318 04075 0000 RAMPWB, 0 2319 04076 0007 BELL3, 0007 /BELL 2320 04077 0007 0007 /BELL 2321 04100 0007 0007 /BELL 2322 04101 0001 0001 /END CODE 2323 / 2324 /PROGRAM 11, PUNCH ANY CHAR IN SR CONTIUOUSLY 2325 04102 7604 PRG11, LAS /READ SR 2326 04103 0153 AND [PTMSK 2327 04104 6026 PLS /PUNCH CHAR 2328 04105 6021 PSF /FLAG 1? 2329 04106 5305 JMP .-1 2330 04107 5301 JMP .-6 /YES, REPEAT 2331 / 2332 /PROGRAM 12, PUNCH 1'S AND 0'S LOOP 2333 04110 4475 PRG12, SETLOC 2334 04111 0105 SRMSK 2335 04112 0075 0075 2336 04113 7240 PRG12A, CLA CMA 2337 04114 0153 AND [PTMSK 2338 04115 4456 JMS I UTPCH /PUNCH ALL 1'S 2339 04116 4563 JMS I [STALL 2340 04117 7200 CLA 2341 04120 4456 JMS I UTPCH /PUNCH ALL 0'S 2342 04121 4563 JMS I [STALL 2343 04122 5313 JMP PRG12A /REPEAT 2344 4200 PAGE 2345 /PROGRAM 13, READER SPEED PRINT LOOP 2346 04200 7200 PRG13, CLA 2347 04201 3123 DCA CTRB /CLEAR CTRB 2348 04202 7604 LAS /READ SR 2349 04203 7104 CLL RAL 2350 04204 7710 SPA CLA /LONG OR SHORT? 2351 04205 1143 TAD [-416 /LONG 2352 04206 1142 TAD [-36 /SHORT 2353 04207 3232 DCA TKN /STORE AT TKN 2354 04210 5220 JMP TSTRL 2355 04211 6014 TSTRD, RFC /START READER 2356 04212 6011 RSF /WAIT FOR 2357 04213 5212 JMP .-1 /FLAG 2358 04214 2122 ISZ CTRA /INCREMENT CTRA 2359 04215 5222 JMP TSTRC 2360 04216 2123 ISZ CTRB /INCREMENT CTRB 2361 04217 7000 NOP 2362 04220 1232 TSTRL, TAD TKN /LOAD CTRA 2363 04221 3122 DCA CTRA 2364 04222 7604 TSTRC, LAS /READ SR 2365 04223 7700 SMA CLA /PRINT SPEED? /HIGH SPEED READER/PUNCH TESTS PAL8-V10A 23-OCT-81 PAGE 1-43 2366 04224 5211 JMP TSTRD /NO, CONTINUE 2367 04225 4447 JMS I XTYPST /YES 2368 04226 1532 RSPD 2369 04227 4257 JMS TSTRPC 2370 04230 7402 HLT 2371 04231 5200 JMP PRG13 2372 04232 0000 TKN, OPEN 2373 /PROGRAM 14, PUNCH SPEED PRINT LOOP 2374 04233 7200 PRG14, CLA 2375 04234 3123 DCA CTRB /CLEAR CTRB 2376 04235 5245 JMP TSTPL 2377 04236 6026 TSTPP, PLS 2378 04237 6021 PSF 2379 04240 5237 JMP .-1 2380 04241 2122 ISZ CTRA /60? 2381 04242 5247 JMP TSTPC /NO 2382 04243 2123 ISZ CTRB /YES, INCREMENT CTRB 2383 04244 7000 NOP 2384 04245 1141 TSTPL, TAD [-74 2385 04246 3122 DCA CTRA /LOAD -60 IN CTRA 2386 04247 7604 TSTPC, LAS /READ SR 2387 04250 7700 SMA CLA /PRINT SPEED (AFTER 60 SECONDS) 2388 04251 5236 JMP TSTPP /NO, CONTINUE 2389 04252 4447 JMS I XTYPST /YES 2390 04253 1543 PSPD 2391 04254 4257 JMS TSTRPC 2392 04255 7402 HLT 2393 04256 5233 JMP PRG14 2394 04257 0000 TSTRPC, 0 2395 04260 4265 JMS BDCNV /TYPE C(CTRB) IN DECIMAL 2396 04261 0123 CTRB 2397 04262 4447 JMS I XTYPST /TYPE "CPS" 2398 04263 1554 CPS 2399 04264 5657 JMP I TSTRPC /EXIT 2400 04265 0000 BDCNV, 0 /BINARY TO DECIMAL CONVERT 2401 04266 4475 SETLOC /AND PRINT SUBROUTINE 2402 04267 4331 CNVCTR 2403 04270 7774 -4 2404 04271 1322 TAD ADDRZA /INITIALIZE ARROW 2405 04272 3303 DCA ARROW 2406 04273 1665 TAD I BDCNV /GET AND STORE BINARY 2407 04274 2265 ISZ BDCNV /NUMBER, SORE IT AT VALUE 2408 04275 3330 DCA DIGIT 2409 04276 1730 TAD I DIGIT 2410 04277 3327 DCA VALUE 2411 04300 3330 DCA DIGIT /O TO DIGIT 2412 04301 7100 CLL 2413 04302 1327 TAD VALUE 2414 04303 1323 ARROW, TAD TENPWR 2415 04304 7420 SNL 2416 04305 5311 JMP .+4 2417 04306 2330 ISZ DIGIT 2418 04307 3327 DCA VALUE 2419 04310 5301 JMP ARROW-2 2420 04311 7200 CLA /HIGH SPEED READER/PUNCH TESTS PAL8-V10A 23-OCT-81 PAGE 1-44 2421 04312 1330 TAD DIGIT 2422 04313 1140 TAD [260 2423 04314 4473 JMS I UPUNCH 2424 04315 7300 CLA CLL 2425 04316 2303 ISZ ARROW 2426 04317 2331 ISZ CNVCTR 2427 04320 5300 JMP ARROW-3 2428 04321 5665 JMP I BDCNV 2429 04322 1323 ADDRZA, TAD TENPWR 2430 04323 6030 TENPWR, -1750 2431 04324 7634 -144 2432 04325 7766 -12 2433 04326 7777 -1 2434 04327 0000 VALUE, 0 2435 04330 0000 DIGIT, 0 2436 04331 0000 CNVCTR, 0 2437 / 2438 /PROGRAM 15, READ X CHARACTERS, STALL Y MS, LOOP TO ADJUST TIMINGS 2439 04332 7602 PRG15, HLT CLA /HALT TO SET SR 2440 04333 7604 LAS /READ SR 2441 04334 0174 AND [177 /MASK OFF EXCESS BITS 2442 04335 7041 CIA 2443 04336 3021 DCA DELAYM /STORE STALL COUNT 2444 04337 7604 LAS /READ SR 2445 04340 0137 AND [7600 /MASK OFF EXCESS BITS 2446 04341 7106 CLL RTL 2447 04342 7006 RTL 2448 04343 7006 RTL 2449 04344 7041 CIA 2450 04345 3347 DCA .+2 2451 04346 4477 P15A, SETA /-X TO CTRA 2452 04347 0000 0 2453 04350 6014 P15B, RFC /FETCH CHAR 2454 04351 6011 RSF /FLAG 1? 2455 04352 5351 JMP .-1 2456 04353 2122 ISZ CTRA /READ X CHARS? 2457 04354 5350 JMP P15B /NO 2458 04355 4502 DELAY /YES, DELAY Y MS 2459 04356 5333 JMP PRG15+1 /REPEAT 2460 /WOW! I DONE IT... 2461 $ 2462 00137 7600 2463 00140 0260 2464 00141 7704 2465 00142 7742 2466 00143 7362 2467 00144 7000 2468 00145 7777 2469 00146 7766 2470 00147 7634 2471 00150 0060 2472 00151 0252 2473 00152 0125 2474 00153 0377 2475 00154 0020 /HIGH SPEED READER/PUNCH TESTS PAL8-V10A 23-OCT-81 PAGE 1-45 2476 00155 0040 2477 00156 0200 2478 00157 0400 2479 00160 6060 2480 00161 0707 2481 00162 7700 2482 00163 1125 2483 00164 0240 2484 00165 0100 2485 00166 7740 2486 00167 7510 2487 00170 7500 2488 00171 0077 2489 00172 1130 2490 00173 7640 2491 00174 0177 2492 00175 0031 2493 00176 7763 2494 00177 0017 /HIGH SPEED READER/PUNCH TESTS PAL8-V10A 23-OCT-81 PAGE 2 A 0140 GETPT 0067 PRG4 3517 P0T6A 2435 AC 0023 GETPTR 0070 PRG5 3537 P0T6B 2453 ACTIND 0133 GETPTT 1412 PRG6 3553 P0T6S 2446 ADDRZA 4322 GETRDY 0242 PRG7 3600 P0T7 2600 AMPRD 4053 GTPTRP 1435 PRINT 0671 P0T7A 2604 AMPRDA 4070 INCRTN 0266 PSPD 1543 P0T7B 2615 ARROW 4303 INIT 0217 PTMSK 0377 P0T7S 2632 ASCCN 1000 INITPT 1400 PT0 1460 P0T7WA 2635 ASCT 1041 INPATT 0066 PT1 1461 P0T7WB 2636 B 0240 INTSVC 0703 PT2 1462 P1E0 3017 BDCNV 4265 IOUT 0733 PT3 1463 P1E1 3051 BELL3 4076 KSTART 0020 PUNCH 0426 P1E10A 3415 CHAIN 0025 LINK 0024 PVCTR 0716 P1E10B 3437 CHAINN 0270 LPRGN 1255 P0E0 2025 P1E2 3076 CHCK 0521 LRRGN 1273 P0E1 2052 P1E3 3147 CHECK 0071 MARK 1230 P0E10A 2654 P1E4 3224 CHRCNT 0324 MARKAD 1246 P0E2 2073 P1T0 3010 CHR1 0110 MARKER 1521 P0E3 2137 P1T0A 3014 CHR2 0111 MCTR 0563 P0E4 2224 P1T0B 3027 CHR3 0112 MILCTR 0121 P0E5 2412 P1T0S 3023 CNV 1024 MILLI 0135 P0E6 2442 P1T1 3032 CNVCTR 4331 MIL1 0106 P0E7 2620 P1T1A 3044 COUNT 0022 MOVE 0536 P0T0 2010 P1T1B 3046 CPCH 3646 MOVEA 0551 P0T0A 2016 P1T1S 3055 CPIC 0107 MSCTR 0120 P0T0S 2031 P1T10 3400 CPS 1554 NONE 0000 P0T1 2036 P1T10A 3405 CRCNT 0063 NOSUF 4040 P0T1A 2045 P1T10B 3422 CRCTR 0615 NXTST 0117 P0T1S 2056 P1T10C 3434 CREAD 3653 OPEN 0000 P0T10 2637 P1T10D 3455 CRLF 0600 OUT 5503 P0T10A 2644 P1T10E 3456 CTR 0136 PBIN 3624 P0T10B 2661 P1T10S 3443 CTRA 0122 PCHCLR 0741 P0T10C 2672 P1T2 3063 CTRB 0123 PCHCNT 0132 P0T10D 2712 P1T2A 3067 CTRC 0124 PCNT2 3301 P0T10E 2713 P1T2B 3112 CTRD 0125 PFLAG 0126 P0T10S 2701 P1T2S 3102 CTSK 1363 PIND 1465 P0T11 2717 P1T3 3115 CTSK1 1364 PLDR 1214 P0T11A 2723 P1T3A 3137 CURTST 0115 PLDRW 1227 P0T11B 2743 P1T3S 3153 DELAY 4502 PLOOP 3205 P0T11C 2746 P1T4 3200 DELAYM 0021 PNUMB 1471 P0T11S 2755 P1T4A 3220 DELTIM 0134 PRGADR 0240 P0T2 2064 P1T4S 3230 DIGIT 4330 PRGEND 0305 P0T2A 2071 P1T5 3234 DLCNT 0513 PRGNUM 0030 P0T2OK 2102 P1T5A 3240 DLYCNT 0072 PRGTAB 0031 P0T2S 2077 P1T6 3251 DLYMS 0411 PRG0 2000 P0T3 2105 P1T6A 3255 DLYMSK 0104 PRG1 3000 P0T3A 2127 P1T7 3265 DLY212 2766 PRG10 4000 P0T3S 2143 P1T7A 3271 DLY250 2773 PRG11 4102 P0T4 2200 P15A 4346 ENUMB 1474 PRG12 4110 P0T4A 2220 P15B 4350 ERNUMB 1466 PRG12A 4113 P0T4S 2230 P2A 3465 ERROR 1050 PRG13 4200 P0T5 2400 P2B 3470 ERRORA 1075 PRG14 4233 P0T5A 2404 P2C 3472 FADDR 0561 PRG15 4332 P0T5B 2425 P2D 3477 FLAG 0702 PRG2 3462 P0T5S 2416 P2E 3503 FORWD 0307 PRG3 3506 P0T6 2430 P3A 3513 /HIGH SPEED READER/PUNCH TESTS PAL8-V10A 23-OCT-81 PAGE 2-1 P4A 3531 SR1MSK 2000 ULRRGN 0054 P4B 3534 SR2MSK 1000 UMARK 0060 P5A 3547 SR3MSK 0400 UMOVE 0074 P6A 3570 SR4MSK 0200 UNEXIT 0730 P6B 3573 SR5MSK 0100 UNINT 1501 P7770 3302 SR6MSK 0040 UPLDR 0057 RAMPA 4017 SR7MSK 0020 UPUNCH 0073 RAMPB 4022 STALL 1125 URDSR 0076 RAMPC 4033 STCTA 1111 USTCTA 0077 RAMPD 4042 STCTB 1117 USTCTB 0100 RAMPE 4046 STCTR 0400 USTCTR 0075 RAMPF 4052 STDLYM 1042 USTDLM 0101 RAMPWA 4074 STRT 0200 UTCHK 0061 RAMPWB 4075 SUFX 1476 UTPCH 0056 RANCON 0477 SWITCH 0673 UTREAD 0055 RANDEX 0476 SYNC 0064 UTSB 0062 RANDNO 0027 SYNCA 0065 VALUE 4327 RANGEN 0447 SYNK 1311 WAS 1611 RANP1 1251 SYNKA 1324 WASC 1037 RANP2 1252 SYNKB 1347 WCHK 0535 RANR1 1253 SYNKC 1351 WNZERO 3671 RANR2 1254 TADDR 0562 WRTN 1560 RANSAV 0512 TCHK 1143 XTYPST 0047 RANTAD 0464 TCHKW 0131 RANTBL 0500 TDOMSG 1615 RANTND 0511 TEMP 0113 RBIN 3703 TEMP1 0114 RBINA 3714 TEMQ 0700 RBUSY 0127 TEMR 0701 RCF 6014 TENPWR 4323 RCHKW 0130 TIM 2151 RCNT2 2235 TIM1 3161 RDRCLR 0743 TKN 4232 RDSR 0443 TPCH 1207 READSR 4476 TREAD 1200 RIND 1464 TSB 1145 RLOOP 2205 TSC1 0624 RSPD 1532 TSC2 0635 RTNNO 0116 TSTMSK 0017 RVCTR 0711 TSTPC 4247 R7770 2234 TSTPL 4245 SASC 1040 TSTPP 4236 SB 1604 TSTRC 4222 SBWAS 1601 TSTRD 4211 SEED1 1247 TSTRL 4220 SETA 4477 TSTRPC 4257 SETB 4500 TYPAT 0646 SETDLM 4501 TYPSP 0652 SETLOC 4475 TYPSTG 0616 SFADR 1110 UASCCN 0052 SHALT 0333 UCRLF 0050 SHLT 0026 UDLYMS 0102 SRMSK 0105 UERROR 0051 SRSET 0241 UIOUT 0103 SR0MSK 4000 ULPRGN 0053 ERRORS DETECTED: 0 LINKS GENERATED: 0 A 678# 1723 1774 2030 AC 583# 1009 1036 ACTIND 656# 2157 ADDRZA 2404 2429# AMPRD 2272 2275 2280 2300# 2316 AMPRDA 2265 2309 2313# ARROW 2405 2414# 2419 2425 2427 ASCCN 607 1045# 1047 1049 1050 1052 1064 ASCT 1066 1067 1071 1078# B 679# 1740 1785 2048 BDCNV 2395 2400# 2406 2407 2428 BELL3 2311 2319# CHAIN 585# 1111 1494 1516 1544 1572 1612 1616 1648 1672 1691 1756 1783 1837 1853 1890 1917 1963 1967 1985 1998 2011 2065 CHAINN 585 768# 782 CHCK 622 901# 903 906 909 910 912 CHECK 622# 1146 CHRCNT 616 796# 800 802 CHR1 637# 1241 1258 2232 CHR2 638# 1243 1263 2239 CHR3 639# 1245 1272 2246 CNV 1058 1063 1065# 1075 CNVCTR 2402 2426 2436# COUNT 582# 1550 1570 1608 1895 1915 1959 CPCH 2167 2177 2188# 2192 CPIC 636# CPS 1391# 2398 CRCNT 616# 2073 CRCTR 944 948 954# CREAD 2193# 2204 2206 2207 2217 2230 2237 2244 CRLF 605 941# 943 945 950 CTR 659# 1552 1558 1897 1903 CTRA 647# 1122 1492 1514 1542 1646 1670 1689 1753 1781 1835 1851 1888 1983 1996 2009 2062 2084 2224 2358 2363 2380 2385 2456 CTRB 648# 1128 1200 2074 2080 2347 2360 2375 2382 2396 CTRC 649# CTRD 650# CTSK 1251 1266 1280# CTSK1 1254 1277 1281# CURTST 642# 752 758 792 DELAY 676 683# 1143 1489 1502 1618 1665 1768 1770 1792 1800 1805 1848 1969 2305 2458 DELAYM 581# 822 896 1083 1141 2443 DELTIM 657# 1561 1584 1906 1929 1932 1933 1935 DIGIT 2408 2409 2411 2417 2421 2435# DLCNT 623 892# 897 DLYCNT 623# 1140 DLYMS 631 820# 832 DLYMSK 633# 737 2154 DLY212 1778 1797# 1801 DLY250 1762 1802# 1806 ENUMB 1092 1343# ERNUMB 1096 1337# ERROR 606 1086# 1093 1097 1098 1115 1116 1117 ERRORA 734 1107# 2267 FADDR 920 929 931 936# FLAG 959 973 981 983 1007# FORWD 748 783# 795 GETPT 620# 1256 1261 1270 2075 2094 2103 2109 2218 GETPTR 621# 2189 GETPTT 620 1293# 1311 GETRDY 745# 762 766 772 776 780 GTPTRP 621 1312# 1330 INCRTN 765# INIT 724# INITPT 619 1283# 1292 INPATT 619# 1239 2091 2099 2156 INTSVC 1009# 2160 2259 IOUT 632 1033# KSTART 580# 746 1473 1812 LINK 584# 1011 1034 LPRGN 608 1210# 1223 LRRGN 609 1224# 1237 MARK 613 1189# 1202 MARKAD 1194 1197 1199 1203# MARKER 1195 1364# MCTR 926 933 938# MILCTR 646# 827 828 MILLI 658# 1555 1556 1900 1901 MIL1 635# 826 MOVE 625 917# 919 921 922 924 925 927 935 MOVEA 928# 934 MSCTR 645# 823 830 NONE 680# 1497 1519 1537 1575 1615 1637 1663 1724 1741 1775 1786 1829 1856 1878 1920 1966 2031 2049 NOSUF 681# 1159 1496 1518 1536 1574 1614 1636 1662 1699 1828 1855 1877 1919 1965 2296 NXTST 644# 747 759 773 785 787 788 790 791 794 OPEN 685# 2372 OUT 677 684# 1024 1029 1041 1043 2180 2184 2187 2210 2223 2225 2229 2236 2243 2254 PBIN 2163 2170# PCHCLR 1040# 2262 PCHCNT 655# 2170 2171 2181 2197 2199 2200 PCNT2 1948 1961 2012# PFLAG 651# 835 838 845 1028 PIND 1291 1316 1318 1319 1336# PLDR 612 1176# 1186 1190 PLDRW 1178 1184 1187# PLOOP 1949# 1960 1962 PNUMB 1089 1340# PRGADR 723 741# PRGEND 781# PRGNUM 588# 718 719 1088 PRGTAB 589# 720 PRG0 589 1472# PRG1 590 1811# PRG10 597 2257# PRG11 598 2325# PRG12 599 2333# PRG12A 2336# 2343 PRG13 600 2346# 2371 PRG14 601 2374# 2393 PRG15 602 2439# 2459 PRG2 591 2067# PRG3 592 2089# PRG4 593 2099# PRG5 594 2116# PRG6 595 2129# PRG7 596 2150# PRINT 979 994 998# 1004 PSPD 1382# 2390 PTMSK 670# 1222 1236 1308 1327 2277 2326 2337 PT0 1285 1287 1295 1309 1331# PT1 1288 1296 1303 1306 1310 1332# PT2 1314 1328 1333# PT3 1315 1322 1325 1329 1334# PUNCH 624 834# 846 PVCTR 1020# 2162 2261 P0E0 1491 1495# P0E1 1513 1517# P0E10A 1713 1722# P0E2 1535# P0E3 1566 1569 1573# P0E4 1604 1607 1613# P0E5 1635# P0E6 1661# P0E7 1688 1692# P0T0 1474 1480# P0T0A 1488# 1493 1498 P0T0S 1499# P0T1 1481 1504# P0T1A 1512# 1515 1520 P0T1S 1521# P0T10 1676 1708# P0T10A 1714# 1725 1726 P0T10B 1721 1727# P0T10C 1736# 1754 P0T10D 1745 1752# P0T10E 1731 1742 1753# P0T10S 1743# P0T11 1709 1758# P0T11A 1762# 1776 1782 P0T11B 1772 1778# P0T11C 1781# 1787 P0T11S 1777 1788# P0T2 1505 1527# P0T2A 1533# 1543 P0T2OK 1534 1538 1542# P0T2S 1539# P0T3 1528 1547# 1571 1576 P0T3A 1565# P0T3S 1577# P0T4 1548 1593# P0T4A 1609# P0T4S 1617# P0T5 1594 1624# P0T5A 1629# 1647 P0T5B 1634 1638 1646# P0T5S 1639# P0T6 1625 1650# P0T6A 1656# 1671 P0T6B 1660 1664 1670# P0T6S 1665# P0T7 1651 1675# P0T7A 1680# 1690 P0T7B 1689# 1701 P0T7S 1702# P0T7WA 1693 1705# P0T7WB 1685 1686 1696 1706# P1E0 1827# P1E1 1850 1854# P1E10A 2020 2029# P1E10B 2047# P1E2 1876# P1E3 1911 1914 1918# P1E4 1955 1958 1964# P1T0 1813 1819# P1T0A 1824# 1836 P1T0B 1826 1830 1835# P1T0S 1831# P1T1 1820 1838# P1T1A 1849# 1852 P1T1B 1851# 1857 P1T1S 1858# P1T10 2000 2015# P1T10A 2021# 2032 2033 P1T10B 2028 2034# P1T10C 2044# 2063 P1T10D 2053 2061# P1T10E 2038 2050 2062# P1T10S 2051# P1T2 1839 1864# P1T2A 1869# 1889 P1T2B 1875 1879 1888# P1T2S 1880# P1T3 1865 1892# 1916 1921 P1T3A 1910# P1T3S 1922# P1T4 1893 1944# P1T4A 1960# P1T4S 1968# P1T5 1945 1972# P1T5A 1977# 1984 P1T6 1973 1986# P1T6A 1991# 1997 P1T7 1987 1999# P1T7A 2004# 2010 P15A 2451# P15B 2453# 2457 P2A 2070# 2086 P2B 2073# 2083 P2C 2075# 2081 P2D 2080# 2085 P2E 2079 2084# P3A 2094# 2097 P4A 2109# 2114 P4B 2107 2112# P5A 2124# 2127 P6A 2142# 2147 P6B 2140 2145# P7770 1947 2013# RAMPA 2272# 2298 2312 RAMPB 2275# 2283 RAMPC 2279 2284# RAMPD 2282 2291# 2294 RAMPE 2290 2295# RAMPF 2285 2299# RAMPWA 2288 2314 2315 2317# RAMPWB 2292 2318# RANCON 861 865 866 877# RANDEX 856 860 867 868 871 872 876# RANDNO 587# 797 893 RANGEN 587 853# 875 RANP1 1206# 1212 1215 1216 1221 2120 2131 RANP2 1207# 1214 1218 1220 RANR1 1208# 1226 1229 1230 1235 RANR2 1209# 1228 1232 1234 RANSAV 869 873 874 888# RANTAD 858 866# RANTBL 859 878# RANTND 855 876 887# RBIN 2213 2217# 2253 RBINA 2226# 2248 RBUSY 652# 2178 2186 2203 RCF 568# 1563 1602 RCHKW 653# RCNT2 1597 1610 1622# RDRCLR 1042# RDSR 627 847# 850 READSR 673# 749 753 769 777 804 1104 1108 1112 1132 1136 RIND 1290 1297 1299 1300 1335# RLOOP 1598# 1609 1611 RSPD 1373# 2368 RTNNO 643# 756 786 807 1091 RVCTR 1015# 2165 2212 2227 2234 2241 2252 2264 R7770 1596 1621# SASC 1051 1059 1074 1077# SB 1154 1415# 1694 2286 2293 SBWAS 1160 1412# 1700 2297 SEED1 1204# 2119 2130 SETA 674# 1484 1507 1530 1627 1653 1678 1727 1760 1822 1841 1867 1975 1989 2002 2034 2071 2214 2249 2451 SETB 675# 1191 SETDLM 682# 1486 1499 1763 1788 1798 1803 1843 2301 SETLOC 672# 733 1177 1193 1250 1253 1472 1475 1711 1729 1743 1811 1814 2018 2036 2051 2067 2100 2133 2150 2153 2158 2161 2164 2211 2226 2233 2240 2251 2257 2260 2263 2266 2333 2401 SFADR 1094 1118# SHALT 586 803# 806 809 SHLT 586# 768 SRMSK 634# 849 1476 1815 2068 2093 2101 2123 2134 2151 2271 2334 SRSET 743# 1479 1818 SR0MSK 661# SR1MSK 662# SR2MSK 663# SR3MSK 664# 1105 SR4MSK 665# 1109 SR5MSK 666# 1113 SR6MSK 667# 1133 SR7MSK 668# 1137 STALL 739 1018 1131# 1135 1144 2082 2096 2126 2270 2339 2342 STCTA 628 1119# 1121 1123 1124 STCTB 629 1125# 1127 1129 1130 STCTR 626 811# 813 815 816 818 819 STDLYM 630 1080# 1082 1084 1085 STRT 709# 715 SUFX 1118 1345# SWITCH 992 996 1000# SYNC 617# 2070 SYNCA 618# 1246 2247 SYNK 617 1238# 1247 1248 SYNKA 618 1249# 1267 1269 1275 1276 1278 SYNKB 1268# 1279 SYNKC 1265 1270# TADDR 923 930 932 937# TCHK 614 1145# 1149 1150 1161 1162 TCHKW 654# 1151 1156 2196 2208 2220 2231 2238 2245 TDOMSG 1424# TEMP 640# 721 722 728 730 789 793 814 817 TEMP1 641# 731 TEMQ 958 961 966 968 1005# TEMR 972 976 984 993 1006# TENPWR 2414 2429 2430# TIM 1564 1583# 1586 TIM1 1909 1928# 1937 TKN 2353 2362 2372# TPCH 611 1171# 1175 1198 TREAD 610 1164# 1170 TSB 615 1147# 1153 TSC1 961# 969 TSC2 965 967 970# 980 982 997 TSTMSK 669# 754 TSTPC 2381 2386# TSTPL 2376 2384# TSTPP 2377# 2388 TSTRC 2359 2364# TSTRD 2355# 2366 TSTRL 2354 2362# TSTRPC 2369 2391 2394# 2399 TYPAT 979# 987 TYPSP 975 983# TYPSTG 604 955# 957 960 990 UASCCN 607# 1087 1090 1152 1155 1692 1695 2284 2287 2291 UCRLF 605# UDLYMS 631# 676 683 UERROR 606# 1158 1495 1517 1535 1573 1613 1635 1661 1698 1722 1739 1773 1784 1827 1854 1876 1918 1964 2029 2047 2295 UIOUT 632# 677 684 ULPRGN 608# 2124 ULRRGN 609# 2136 2142 UMARK 613# 2089 2116 UMOVE 625# 724 729 1286 2118 2129 UNEXIT 1030# UNINT 1031 1348# UPLDR 612# 2090 2117 UPUNCH 624# 1003 2423 URDSR 627# 673 USTCTA 628# 674 USTCTB 629# 675 USTCTR 626# 672 USTDLM 630# 682 UTCHK 614# 2078 2112 2145 2221 UTPCH 611# 2095 2125 2338 2341 UTREAD 610# 1240 1242 1244 2077 2105 2111 2138 2144 UTSB 615# 2076 2104 2110 2137 2143 2219 VALUE 2410 2413 2418 2434# WAS 1157 1420# 1697 2289 WASC 1048 1054 1062 1076# WCHK 902 905 911 913# WNZERO 2166 2207# WRTN 764 1395# XTYPST 604# 763 946 1030 1095 1102 2310 2367 2389 2397 _00137 2445 _00140 2422 _00141 2384 _00142 2352 _00143 2351 _00144 2269 _00145 2198 _00146 2182 _00147 2172 _00150 2092 2122 _00151 2005 _00152 1992 _00153 1222 1236 1308 1327 2277 2326 2337 _00154 1137 _00155 1133 _00156 1109 _00157 1105 _00160 1073 _00161 1070 1072 _00162 1053 1060 _00163 1018 2082 2096 2126 2339 2342 _00164 1002 _00165 1001 1113 _00166 999 _00167 995 _00170 991 _00171 971 _00172 739 2270 _00173 738 _00174 736 894 2441 _00175 720 _00176 713 _00177 712 717 754 798 _02175 1560 _02176 1551 _02177 1549 _03174 1931 _03175 1905 _03176 1896 _03177 1894 V5A